home *** CD-ROM | disk | FTP | other *** search
/ JCSM Shareware Collection 1996 September / JCSM Shareware Collection (JCS Distribution) (September 1996).ISO / grapprog / 3dfun10.zip / INSTALL.FIL < prev    next >
Text File  |  1995-03-30  |  4KB  |  175 lines

  1. '' Install Script for 3D FUN - SHAREWARE 3/21/95
  2. BACKGROUND 63
  3. LANGUAGE ENGLISH
  4. BORDER 1
  5. TELESCOPE OFF
  6. WINOPEN 18 2 95
  7. "Pik A Program & B. Johnson Software"
  8. ""
  9. "present"
  10. ""
  11. "         3D Fun And Magic"
  12. ""
  13. ""
  14. ""
  15. PAUSE 80
  16. WINUPDATE +11 +5 90
  17. "3D Fun And Magic "
  18. PAUSE 80
  19. WINUPDATE +11 +5 79
  20. "3D Fun And Magic "
  21. PAUSE 80
  22. WINUPDATE +11 +5 80
  23. "3D Fun And Magic "
  24. PAUSE 80
  25. WINUPDATE +11 +5 78
  26. "3D Fun And Magic "
  27. PAUSE 80
  28. WINUPDATE +11 +5 95
  29. "3D Fun And Magic "
  30. PAUSE 80
  31. TELESCOPE ON
  32. SHADOW ON
  33. :which_drive
  34. SPACE 700
  35. DRIVE C 0 12 31 15 32 14 79
  36. PATH \3DFUN 0 12 31 15 32 14 79
  37. exist 3DFUN.1
  38. JUMP.YES DOES_EXIST1
  39. JUMP.NO NOT_EXIST1
  40. :NOT_EXIST1
  41. WINOPEN 0 50 79
  42. ""
  43. " The file 3DFUN.1 is not on the  "
  44. " current installation disk"
  45. ""
  46. " Do you wish to continue with the "
  47. " current installation (Y/N)? "
  48. ASK 49 31
  49. pause 250
  50. JUMP.NO STOP_INSTALL
  51. WINCLOSE
  52. DISK 0 3DFUN.1 0 0 31
  53. :DOES_EXIST1
  54. unpack 3DFUN.1 12 10 31 32 14 79
  55. JUMP.FAIL INSTALL_FAILURE
  56. WINOPEN 0 12 79
  57. ""
  58. "3D FUN & Magic has now been installed on your hard drive"
  59. ""
  60. "                     To run the program..."
  61. "Change to the drive and directory you have chosen in this setup (usually"
  62. "C:\3DFUN)."
  63. "         Type "3DFUN" and then hit the enter or Return key   "
  64. "   We hope you enjoy with 3D Fun & Magic so much that you'll"
  65. "   send in the registration form to get the full Premium pack!"
  66. "                Press the [Enter] key to continue."
  67. ""
  68. ""
  69. WINUPDATE +30 +3 30
  70. "~1~2"
  71. WINUPDATE +30 +12 27
  72. "THANK YOU"
  73. WAIT +36 +12
  74. WINCLOSE
  75. WINOPEN 0 12 31
  76. "Would you like to SEE the order form for 3D Fun & Magic?"
  77. ""
  78. WINUPDATE +31 +2 30
  79. "(Y or N)"
  80. ASK +39 +2
  81. WINCLOSE
  82. JUMP.NO PRINT_INSTALL.TXT
  83. VIEW ~1~2\register.txt 79 31
  84. :PRINT_INSTALL.TXT
  85. WINOPEN 0 12 31
  86. "Would you like to PRINT the order form for 3D Fun & Magic?"
  87. ""
  88. WINUPDATE +31 +2 30
  89. "(Y or N)"
  90. ASK +39 +2
  91. WINCLOSE
  92. JUMP.NO EXIT
  93. WINOPEN 0 0 31
  94. ""
  95. "  Printing the order form ...  "
  96. ""
  97. PRINT ~1~2\register.txt
  98. WINCLOSE
  99. JUMP.FAIL PRINTER_ERROR
  100. JUMP EXIT
  101. :PRINTER_ERROR
  102. WINOPEN 0 12 79
  103. "Your printer is not responding.  Possible problems:"
  104. "   -- Printer is not turned on"
  105. "   -- Printer is out of paper"
  106. "   -- Printer is not attached to LPT1 (parallel port 1)"
  107. ""
  108. "Do you want to try to print again  (Y or N)?"
  109. ASK 57 18
  110. WINCLOSE
  111. JUMP.YES PRINT_INSTALL.TXT
  112. :EXIT
  113. WINOPEN 0 12 31
  114. "                 Thank you for using "
  115. ""
  116. "          3D Fun & Magic Stereogram Generator"
  117. ""
  118. "You have a fully working shareware evaluation copy.  We hope"
  119. "    you enjoy seeing in 3D on your computer screen!"
  120. ""
  121. "               Please register your shareware!"
  122. ""
  123. WINUPDATE +17 +8 30
  124. "Please register your shareware!"
  125. WINUPDATE +12 +11 31
  126. "┤ Press the [Enter] key to continue ├"
  127. WINUPDATE +24 +11 30
  128. "[Enter]"
  129. WAIT +47 +11
  130. WINCLOSE
  131. shell
  132. "~1"
  133. "cd ~2"
  134. BORDER 2
  135. WINOPEN 0 12 47
  136. "  If you're not sure you have the latest shareware copy of"
  137. "3D Fun & Magic, call the Software Creations BBS:"
  138. "              the home board of Pik A Program"
  139. ""
  140. ""
  141. ""
  142. ""
  143. ""
  144. ""
  145. "        Press the [Enter] key to run 3D Fun & Magic."
  146. WINUPDATE +27 +2 160
  147. "Software Creations BBS"
  148. WINUPDATE +13 +4 47
  149. "More lines all the time to Serve You 24 Hours per Day!"
  150. WINUPDATE +14 +5 111                         ' you can winupdate more than
  151. "(508) 365-2359        2400 baud"            ' one line at a time
  152. "(508) 368-4137        2400-14.4K USR"
  153. "(508) 368-7036        2400-14.4K V.32"
  154. WAIT +36 +10                                  ' wait for the enter key
  155. RUN ~1\~2\3DFUN
  156. END            ' exit the system normally
  157. :INSTALL_FAILURE
  158. WINOPEN 0 12 79
  159. "THE INSTALLATION PROGRAM FAILED PRIOR TO COMPLETION"
  160. ""
  161. "Possible reasons:"
  162. "   -- The floppy disk was removed prior to completion."
  163. "   -- The floppy disk was damaged during shipping."
  164. "   -- Your disk drive is out of alignment."
  165. "   -- The files were corrupted some other way."
  166. ""
  167. WINCLOSE
  168. WINOPEN 0 12 31
  169. ""
  170. "      Press [Enter] to Quit."
  171. WAIT 47 15
  172. :STOP_INSTALL
  173. winclose
  174. END
  175.